Imports Dominio
Module Principal
    Sub main()
        Dim empresa As New Sistema
        empresa = Sistema.cargarFijo
        Dim vMenu As VentMenu = New VentMenu(empresa)
        vMenu.ShowDialog()
    End Sub

End Module
